Imports Microsoft.ApplicationBlocks.Data.SqlHelper
Imports System.Data.SqlClient
Public Class Provincias
    Public Function Obtener(ByVal Pais As Integer)
        Dim DS As New DataSet
        DS = ExecuteDataset(My.Settings.MiCadena, CommandType.StoredProcedure, "ProvinciasObtener", New SqlParameter("@Pais", Pais))
        Return DS
    End Function
End Class
